home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-03 / qbasic_1.zip / BAS_LIST.EXE / SCREEN1.BAS < prev    next >
BASIC Source File  |  1992-07-01  |  205b  |  11 lines
  1. SCREEN 1
  2. PSET (1, 1)                   'graphic 320 x 200
  3. PSET (1, 199)
  4. PSET (319, 199)
  5. PSET (319, 1)
  6. LOCATE 12, 17                 'text res 25 x 40
  7. PRINT "middle"
  8.  
  9. DO UNTIL INKEY$ <> "": LOOP
  10.  
  11.